(defgroup edt): Arrange that definition starts at beginning of line.
authorMarkus Rost <rost@math.uni-bielefeld.de>
Tue, 12 Nov 2002 01:41:25 +0000 (01:41 +0000)
committerMarkus Rost <rost@math.uni-bielefeld.de>
Tue, 12 Nov 2002 01:41:25 +0000 (01:41 +0000)
lisp/emulation/edt.el

index 43b7b9ec6c1202fb00eff3e018e21142774ec6be..ecb53bdffbf04c07691168b1d78600c78011a886 100644 (file)
 ;;;; VARIABLES and CONSTANTS
 ;;;;
 
-;; For backward compatibility to Emacs 19, skip this if defgroup is
-;; not defined.
-(if (fboundp 'defgroup)
-    (defgroup edt nil
-      "Emacs emulating EDT."
-      :prefix "edt-"
-      :group 'emulations))
+;; For backward compatibility to Emacs 19.
+(or (fboundp 'defgroup)
+    (defmacro defgroup (&rest rest)))
+
+(defgroup edt nil
+  "Emacs emulating EDT."
+  :prefix "edt-"
+  :group 'emulations)
 
 ;;;
 ;;;  Version Information